﻿Public Class frmExportDS_ChuNha
    Dim listChuNha As New DataTable()
    Private Sub frmExportDS_ChuNha_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        listChuNha = NguoiDangBUS.ExportDS_ChuNha()
        gvDSChuNha.DataSource = listChuNha

    End Sub

    Private Sub btnOK_Export_ChuNha_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOK_Export_ChuNha.Click
        Export.ExportDSChuNha(listChuNha, "Danh sach chu nha", "DANH SÁCH CHỦ NHÀ ")
    End Sub
End Class